<!-- #include file="Setup.asp" --><%
top
ForumID=int(Request("ForumID"))
sql="select * from [BBSXP_Forums] where id="&ForumID&""
Set Rs=Conn.Execute(sql)
if Rs.eof then error"<li>系统找不到该论坛的资料"
ForumName=Rs("ForumName")
Moderated=Rs("Moderated")n
ForumLogo=Rs("ForumLogo")
followid=Rs("followid")
Rs.close
%>
<script>
if ("<%=ForumLogo%>"!=''){Logo.innerHTML="<img border=0 src=<%=ForumLogo%>>"}
</script>
<table cellspacing=1 cellpadding=5 border=0 width=100% class=a2>
<tr class=a3>
<td>&nbsp;<img src="images/Forum_nav.gif">&nbsp; <%ClubTree%> 
				→ <%ForumTree(followid)%><%=ForumTreeList%>
				<a href="ShowForum.asp?ForumID=<%=ForumID%>"><%=ForumName%></a> → 权限列表</td>
</tr>
</table><br>
<table cellspacing=1 cellpadding=5 border=0 width=100% class=a2>
	<tr class="a1">
		<td>角色</td>
		<td align="center" width="9%">浏览</td>
		<td align="center" width="9%">阅读</td>
		<td align="center" width="9%">发帖</td>
		<td align="center" width="9%">回复</td>
		<td align="center" width="9%">编辑</td>
		<td align="center" width="9%">删除</td>
		<td align="center" width="9%">发起投票</td>
		<td align="center" width="9%">投票</td>
		<td align="center" width="9%">附件</td>
		<td align="center" width="9%">管理</td>
	</tr>
	
	
	<%
sql="select * from [BBSXP_ForumPermissions] where ForumID="&ForumID&" order by RoleID"
Set Rs=Conn.Execute(sql)
Do While Not Rs.EOF 
%>


	<tr class="a3">
		<td><%=Conn.Execute("Select Name From [BBSXP_Roles] where ID="&RS("RoleID")&"")(0)%></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsView")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsRead")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsPost")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsReply")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsEdit")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsDelete")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsCreatePoll")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsVote")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsAttachment")%>.gif"></td>
		<td align="center"><img src="Images/ForumPermissions<%=RS("PermissionsManage")%>.gif"></td>
	</tr>	<%
Rs.MoveNext
loop
Rs.Close
%>
</table>
<center><br>
<a href="javascript:history.back()">&lt; 返 回 &gt;</a>
<%htmlend
%>